unit u_dm_planopagamento;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, u_dm_padrao, FMTBcd, DB, DBClient, Provider, SqlExpr;

type
  Tdm_plano_pagamento = class(Tdm_padrao)
    cdsRegistroCOD_PLANO: TIntegerField;
    cdsRegistroLIG_COD_EMPRESA: TIntegerField;
    cdsRegistroLIG_COD_TIPO_DOCUMENTO: TIntegerField;
    cdsRegistroDESCRICAO: TStringField;
    cdsRegistroENTRADA: TStringField;
    cdsRegistroTIPO_LANCAMENTO: TStringField;
    cdsRegistroSITUACAO: TStringField;
    cdsRegistroNUM_PARCELAS: TIntegerField;
    cdsRegistroDIAS_ENTRE_PARCELAS: TIntegerField;
    cdsRegistroDESCONTO: TFMTBCDField;
    cdsRegistroJUROS: TFMTBCDField;
    cdsRegistroMULTA: TFMTBCDField;
    cdsRegistroVALOR_MINIMO: TFMTBCDField;
    cdsRegistroDATA_CAD: TDateField;
    cdsRegistroDATA_ALTERACAO: TDateField;
    cdsConsultaCOD_PLANO: TIntegerField;
    cdsConsultaLIG_COD_EMPRESA: TIntegerField;
    cdsConsultaLIG_COD_TIPO_DOCUMENTO: TIntegerField;
    cdsConsultaDESCRICAO: TStringField;
    cdsConsultaENTRADA: TStringField;
    cdsConsultaTIPO_LANCAMENTO: TStringField;
    cdsConsultaSITUACAO: TStringField;
    cdsConsultaNUM_PARCELAS: TIntegerField;
    cdsConsultaDIAS_ENTRE_PARCELAS: TIntegerField;
    cdsConsultaDESCONTO: TFMTBCDField;
    cdsConsultaJUROS: TFMTBCDField;
    cdsConsultaMULTA: TFMTBCDField;
    cdsConsultaVALOR_MINIMO: TFMTBCDField;
    cdsConsultaDATA_CAD: TDateField;
    cdsConsultaDATA_ALTERACAO: TDateField;
    cdsConsultaSITUACAO_DESC: TStringField;
    cdsConsultaTIPO_DOCTO: TStringField;
    cdsConsultaDESCRICAO_MULTIEMPRESA: TStringField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  dm_plano_pagamento: Tdm_plano_pagamento;

implementation

{$R *.dfm}

end.
